options ls=120 formdlim="-" symbolgen mlogic; * ps=2000;

/****************************************************************** 

this pgm reads transunion data, specifically the ACCEPTS file 

******************************************************************/
%macro tu1;

data acc&num; 
label
                         	ZIPCODE = " "
                         	STATE   = " "
                         	PERMID 	= " "
                         	TUEDT2003 = " "
                         	DOB	= "  "
                         	AT01	= "NUMBER OF TRADES"
				AT03 	= "NUMBER OF SATISFACTORY TRADES"
				AT05 	= "NUMBER OF TRADES OPENED IN 3 MONTHS"
				AT06 	= "NUMBER OF TRADES OPENED IN 6 MONTHS"
				AT07 	= "NUMBER OF TRADES OPENED IN 12 MONTHS"
				AT08 	= "NUMBER OF TRADES OPENED IN 18 MONTHS"
				AT09 	= "NUMBER OF TRADES OPENED IN 24 MONTHS"
				AT10 	= "NUMBER OF TRADES VERIFIED IN 3 MONTHS"
				AT11 	= "NUMBER OF TRADES VERIFIED IN 6 MONTHS"
				AT12 	= "NUMBER OF TRADES VERIFIED IN 12 MONTHS"
				AT13 	= "NUMBER OF TRADES VERIFIED IN 18 MONTHS"
				AT14 	= "NUMBER OF TRADES VERIFIED IN 24 MONTHS"
				AT20 	= "MONTHS SINCE OLDEST TRADE OPENED"
				AT21 	= "MONTHS SINCE MOST RECENT TRADE OPENED"
				AT23 	= "NUMBER OF SATISFACTORY TRADES 3 MONTHS OR OLDER"
				AT24 	= "NUMBER OF SATISFACTORY TRADES 6 MONTHS OR OLDER"
				AT25 	= "NUMBER OF SATISFACTORY TRADES 12 MONTHS OR OLDER"
				AT26 	= "NUMBER OF SATISFACTORY TRADES 18 MONTHS OR OLDER"
				AT27 	= "NUMBER OF SATISFACTORY TRADES 24 MONTHS OR OLDER"
				AT28 	= "TOTAL HIGH CREDIT/CREDIT LIMIT"
				AT29 	= "NUMBER OF TRADES WITH BALANCE > 0"
				AT33 	= "TOTAL BALANCE OF ALL TRADES"
				AT34 	= "RATIO BALANCE TO HIGH CRDT"
				AT35 	= "AVERAGE BALANCE OF ALL TRADES"
				AT36 	= "MONTHS SINCE MOST RECENT DELINQUENCY"
				AT99 	= "AGGREGATE BAL - ALL, EXCLUDING MORTGAGE"
				BR03 	= "NUMBER OF OF SATISFACTORY BANK REVOLVING TRADES"
				BR20 	= "MONTHS SINCE OLDST BANK REVOL TRD OPENED"
				BR28 	= "TOTAL BANK REVOLV HIGH CREDIT/CREDIT LMT"
				BR33 	= "TOTAL BALANCE OF ALL BANK REVOLV TRADES"
				FR03 	= "NUMBER OF OF SATISFACTORY FINANCE REVOLVING TRADES"
				FR33 	= "TOTAL BALANCE OF ALL FINANCE REVOL TRDS"
				FR35 	= "AVERAGE BALANCE OF FINANCE REVOLV TRDS"
				RE03 	= "NUMBER OF OF SATISFACTORY REVOLVING TRADES"
				RE10 	= "NUMBER OF REVOLVING TRADES VERIFIED IN 3 MONTHS"
				RE11	= "NUMBER OF REVOLVING TRADES VERIFIED IN 6 MONTHS"
				RE12	= "NUMBER OF REVOLVING TRADES VERIFIED IN 12 MONTHS"
				RE13	= "NUMBER OF REVOLVING TRADES VERIFIED IN 18 MONTHS"
				RE14	= "NUMBER OF REVOLVING TRADES VERIFIED IN 24 MONTHS"
				RE20	= "MNTHS SINCE OLDEST REVOLV TRADE OPND"
				RE28   	= "TOTAL REVOLVING HIGH CREDIT/CREDIT LIMIT"
				RE32 	= "MAXIMUM BALANCE OWED ON ALL REVLV TRADES"
				RE33 	= "TOTAL BALANCE OF ALL REVOLVING"
				RE34  	= "RATIO REVOLVING BALANCE TO HIGH CRDT"
				RE35	= "AVERAGE BALANCE OF ALL REVOLVING TRADES"
				BI01 	= "NUMBER OF BANK INSTALLMENT TRADES"
				BI03 	= "NUMBER OF OF SATISFACTORY BANK INSTALLMENT TRADES"
				BI05 	= "NUMBER OF BANK INSTALL TRDS OPENED IN 3 MONTHS"
				BI06 	= "NUMBER OF BANK INSTALL TRDS OPENED IN 6 MONTHS"
				BI07    = "NUMBER OF BANK INSTLL TRDS OPENED IN 12 MONTHS"
				BI08    = "NUMBER OF BANK INSTALL TADS OPENED IN 18 MONTHS"
				BI09 	= "NUMBER OF BANK INSTALL TRDS OPENED IN 24 MONTHS"
				BI20 	= "MNTHS SINCE OLDST BANK INSTLL TRD OPENED"	
				BI28 	= "TOTAL BANK INSTALL HIGH CREDIT/CR LIMIT"
				FI01    = "NUMBER OF FINANCE INSTALLMENT TRADES"
				FI03 	= "NUMBER OF OF SATISFACTORY FINANCE INSTALLMENT TRADES"
				FI05 	= "NUMBER OF FINANCE INSTL TRADES OPND IN 3 MONTHS"
				FI06	= "NUMBER OF FINANCE INSTL TRADES OPND IN 6 MONTHS"	
				FI07 	= "NUMBER OF FINANCE INSTL TRADES OPND IN 12 MONTHS"
				FI08 	= "NUMBER OF FINANCE INSTL TRADES OPND IN 18 MONTHS"
				FI09 	= "NUMBER OF FINANCE INSTL TRADES OPND IN 24 MONTHS"
				IN03 	= "NUMBER OF OF SATISFACTORY INSTALLMENT TRADES"	
				IN05 	= "NUMBER OF INSTALLMENT TRADES OPENED IN 3 MONTHS"
				IN06 	= "NUMBER OF INSTALLMENT TRADES OPENED IN 6 MONTHS"
				IN07	= "NUMBER OF INSTALLMENT TRADES OPENED IN 12 MONTHS"	
				IN08	= "NUMBER OF INSTALLMENT TRADES OPENED IN 18 MONTHS"
				IN09	= "NUMBER OF INSTALLMENT TRADES OPENED IN 24 MONTHS"	    
				IN10	= "NUMBER OF INSTALLMENT TRADES VERIF IN 3 MONTHS"
				IN11	= "NUMBER OF INSTALLMENT TRADES VERIF IN 6 MONTHS"
				IN12 	= "NUMBER OF INSTALLMENT TRADES VERIF IN 12 MONTHS"
				IN13 	= "NUMBER OF INSTALLMENT TRADES VERIF IN 18 MONTHS"
				IN14 	= "NUMBER OF INSTALLMENT TRADES VERIF IN 24 MONTHS"
				IN21 	= "MONTHS SINCE MOST REC INSTLM TRD OPENED"	      
				IN28 	= "TOTAL INSTALLM HIGH CREDIT/CREDIT LIMIT"
				IN33 	= "TOTAL BALANCE OF ALL INSTALLM TRADES"
				IN34 	= "RATIO INSTALLMENT BALANCE TO HIGH CRDT"	
				MT01 	= "NUMBER OF OF MORTGAGE TRADES"	               
				MT02 	= "NUMBER OF OF ACTIVE MORTGAGE TRADES"	           
				MT03 	= "NUMBER OF SATISFACTORY MORTGAGE TRADES"	          
				MT04 	= "NUMBER OF MORTGAGE TRADES TOO NEW TO RATE"	      
				MT20 	= "MONTHS SINCE OLDEST MORTGAGE TRADE OPENED"	      
				MT21 	= "MONTHS SINCE MOST RECENT MORTG TRD OPENED"	   
				MT22 	= "MONTHS SINCE MOST RECENT MORTG TRD UPD"
				MT28 	= "TOTAL MORTGAGE HIGH CREDIT/CREDIT LIMIT"
				MT29 	= "NUMBER OF OF MORTGAGE TRADES WITH BALANCE > 0"
				MT32 	= "MAXIMUM BALANCE OWED ON ALL MORTGAGE  TRDS"
				MT33 	= "TOTAL BALANCE OF ALL MORTGAGE TRADES"	        
				MT34 	= "RATIO BALANCE TO HIGH CRDT ON MORTG TRDS"
				MT35 	= "AVERAGE BALANCE OF MORTGAGE  TRADES"      
				MT36 	= "MONTHS SINCE MOST RECENT MORTGAGE DELINQ"
				MT41 	= "NUMBER OF OF 30 DAYS OR WORSE RATINGS  MORTG TRADES"
				MT42 	= "NUMBER OF OF 60 DAYS OR WORSE RATINGS  MORTG TRADES"
				MT43 	= "NUMBER OF OF 90 DAYS OR WORSE RATINGS  MORTG TRADES"
				MT44 	= "NUMBER OF OF120 DAYS OR WORSE RATINGS  MORTG TRADES"
				MT45 	= "NUMBER OF OF DEROGATORY RATINGS FOR MORTGAGE TRADES"
				MT46 	= "NUMBER OF OF MORTGAGE TRADES DELINQ IN 6 MNTHS"
				MT47 	= "NUMBER OF OF MORTGAGE TRADES DELINQ IN 12 MNTHS"
				MT48 	= "NUMBER OF OF MORTGAGE TRADES DELINQ IN  24 MNTHS"
				MT49 	= "ANY MORTGAGE TRADE CURRENTLY PAST DUE"
				MT50 	= "ANY MORTG TRADE CURRENT 30 DAYS PAST DUE"
				MT51 	= "ANY MORTG TRD CURRENTLY 60 DAYS PAST DUE"	
				MT52 	= "ANY MORTG TRD CURRENTLY 90 DAYS PAST DUE"
				MT53 	= "ANY MORTG TRD CURRENTLY 120 DAYS PAST DUE"
				MT54 	= "ANY MORTG TRD CURRNTLY 150 DAYS PAST DUE"
				MT55 	= "HIGHEST DELINQ EVER ON MORTG TRADE"
				MT56 	= "HIGHEST AMOUNT EVER ON MORTG TRADE DELINQ"
				MT57 	= "TOTAL AMOUNT NOW PAST DUE ON MORTG TRADES"
				PF02 	= "NUMBER OF CURRENTLY ACTIVE PERSON FINANCE TRADES"
				PF03 	= "NUMBER OF OF SATISFACTORY PERSONEL FINANCE TRADES"
				PF05 	= "NUMBER OF PERSONAL FINANCE TRDS OPND IN 3 MONTHS"
				PF06 	= "NUMBER OF PERSONAL FINANCE TRADES OPND IN 6 MONTHS"
				PF07 	= "NUMBER OF PERSONAL FINANCE TRADES OPND IN 12 MNTHS"
				PF08 	= "NUMBER OF PERSONAL FINANCE TRADES OPND IN 18 MNTHS"
				PF09 	= "NUMBER OF PERSONAL FINANCE TRDS OPNED IN 24 MONTHS"
				PF33 	= "TOTAL BALANCE OF ALL PERS FIN TRADES"
				PF34 	= "RATIO PERSONAL FINANCE BALANCE TO HIGH CRDT"
				OF01 	= "NUMBER OF OTHER FINANCE TRADES"
				OF03 	= "NUMBER OF OF SATISFACTORY OTHER FINANCE TRADES"
				OF20 	= "MONTHS SINCE OLDEST OTHER FIN TRADE OPENED"
				OF28 	= "TOTAL OTHER FIN HIGH CREDIT/CREDIT LIMIT"
				OF29 	= "NUMBER OF OTHER FINANCE TRADES"
				OF33 	= "TOTAL BALANCE OF ALL OTHER FINANCE TRADES"
				OF36 	= "MNTHS SINCE MOST RECENT DELINQ - OTHER FIN"
				ON01 	= "NUMBER OF OIL AND NATIONAL TRADES"
				ON03 	= "NUMBER OF OF SATISFACTORY OTHER FINANCE TRADES"
				ON20 	= "MNTHS SINCE OLDST OIL/NATION TRD OPENED"
				ON33 	= "TOTAL BALNCE OF ALL OIL AND NATION TRDS"
				ON34 	= "RATIO OIL AND NATIONAL BALNCE TO HIGH CRDT"
				BC01 	= "NUMBER OF BANK CARD TRADES"
				BC02 	= "NUMBER OF CURRENTLY ACTIVE BANKCARD TRADES"
				BC03 	= "NUMBER OF SATISFACTORY BANKCARD TRADES"
				BC05 	= "NUMBER OF BANKCARD TRADES OPENED IN 3 MONTHS"
				BC06 	= "NUMBER OF BANKCARD TRADES OPENED IN 6 MONTHS"
				BC07 	= "NUMBER OF BANKCARD TRADES OPENED IN 12 MONTHS"
				BC08 	= "NUMBER OF BANKCARD TRADES OPENED IN 18 MONTHS"
				BC09 	= "NUMBER OF BANKCARD TRADES OPENED IN 24 MONTHS"
				BC10 	= "NUMBER OF BANKCARD TRADES VERIFIED IN 3 MONTHS"
				BC11 	= "NUMBER OF BANKCARD TRADES VERIFIED IN 6 MONTHS"
				BC12 	= "NUMBER OF BANKCARD TRADES VERIFIED IN 12 MONTHS"
				BC13 	= "NUMBER OF BANKCARD TRADES VERIFIED IN 18 MONTHS"
				BC14 	= "NUMBER OF BANKCARD TRADES VERIFIED IN 24 MONTHS"
				BC21 	= "MONTHS SINCE MOST RECENT BC TRADE OPENED"
				BC29 	= "NUMBER OF BANKCARD TRADES WITH BALANCE > 0"
				BC30 	= "PERCENT OF BANKCARD TRADES >50% OF LIMIT"
				BC31 	= "PERCENT OF BANKCARD TRADES >75% OF LIMIT"
				BC34 	= "RATIO BANKCARD BALANCE TO HIGH CRDT"
				BC35 	= "AVERAGE BALANCE OF ALL BANKCARD TRADES"
				BC36 	= "MONTHS SINCE MOST RECENT BC DELQUENCY"
				BC98 	= "TOTAL OPEN TO BUY ON REVOLV BC TRADES"
				PB03 	= "  	NUMBER OF OF SATISFACTORY PREMIUN BANKCARD TRADES"
				PB05 	= "NUMBER OF PREMIUM BANKCARD TRDS OPND IN 3 MONTHS"
				PB06 	= "NUMBER OF PREMIUM BANKCARD TRDS OPND IN 6 MONTHS"
				PB07 	= "NUMBER OF PREMIUM BANKCARD TRDS OPND IN 12 MONTHS"
				PB08 	= "NUMBER OF PREMIUM BANKCARD TRDS OPND IN 18 MONTHS"
				PB09 	= "NUMBER OF PREMIUM BANKCARD TRDS OPND IN 24 MONTHS"
				PB10 	= "NUMBER OF PREMIUM BANKCARD TRDS VERIF IN 3 MONTHS"
				PB11 	= "NUMBER OF PREMIUM BANKCARD TRDS VERIF IN 6 MONTHS"
				PB12 	= "NUMBER OF PREMIUM BANKCARD TRDS VERIF IN 12 MONTHS"
				PB13 	= "NUMBER OF PREMIUM BANKCARD TRDS VERIF IN 18 MNTHS"
				PB14 	= "NUMBER OF PREMIUM BANKCRD TRDS VERIF IN 24 MNTHS"
				PB20 	= "MONS SINCE OLDEST PREM BNKCRD TRD OPENED"
				PB21 	= "MONTHS SINCE LATEST PREM BNKCRD TRD OPENED"
				PB33 	= "TOTAL BALAN OF ALL PREMIUM BANKCRD TRADES"
				PB35 	= "AVERAGE BALNCE OF ALL PRMIUM BNKCRD TRADES"
				RT01 	= "NUMBER OF RETAIL TRADES"
				RT03 	= "NUMBER OF SATISFACTORY RETAIL TRADES"
				RT05 	= "NUMBER OF RETAIL TRADES OPENED IN 3 MONTHS"
				RT06 	= "NUMBER OF RETAIL TRADES OPENED IN 6 MONTHS"
				RT07 	= "NUMBER OF RETAIL TRADES OPENED IN 12 MONTHS"
				RT08 	= "NUMBER OF RETAIL TRADES OPENED IN 18 MONTHS"
				RT09 	= "NUMBER OF RETAIL TRADES OPENED IN 24 MONTHS"
				RT10  	= "NUMBER OF RETAIL TRADES VERIFIED IN 3 MONTHS"
				RT11  	= "NUMBER OF RETAIL TRADES VERIFIED IN 6 MONTHS"
				RT12 	= "NUMBER OF RETAIL TRADES VERIFIED IN 12 MONTHS"
				RT13 	= "NUMBER OF RETAIL TRADES VERIFIED IN 18 MONTHS"
				RT14 	= "NUMBER OF RETAIL TRADES VERIFIED IN 24 MONTHS"
				RT20 	= "MONTHS SINCE OLDEST RETAIL TRADE OPENED"
				RT21 	= "MNTHS SINCE MOST RECNT RETAIL TRD OPND"
				RT28 	= "TOTAL RETAIL HIGH CREDIT/CREDIT LIMIT"
				RT29 	= "NUMBER OF RETAIL TRADES WITH BALANCE > 0"
				RT33 	= "TOTAL RETAIL BALANCE OF ALL TRADES"
				RT34 	= "RATIO RETAIL BALANCE TO HIGH CRDT"
				RT35 	= "AVERAGE BALANCE OF ALL RETAIL TRADES"
				RT36 	= "MNTHS SINCE MOST REC DELINQ - RETAIL"
				UR03 	= "NUMBER OF OF SATISFACTORY UPSCALE RETAIL TRADES"
				UR05 	= "NUMBER OF UPSCALE RETAIL TRADES OPENED IN 3 MONTHS"
				UR06 	= "NUMBER OF UPSCALE RETAIL TRADES OPENED IN 6 MONTHS"
				UR07 	= "NUMBER OF UPSCALE RETAIL TRADES OPENED IN 12 MONTHS"
				UR08 	= "NUMBER OF UPSCALE RETAIL TRADES OPENED IN 18 MONTHS"
				UR09 	= "NUMBER OF UPSC RETAIL TRADES OPENED IN 24 MONTHS"
				UR10 	= "NUMBER OF UPSC RETAIL TRADES VERIFIED IN 3 MONTHS"
				UR11 	= "NUMBER OF UPSC RETAIL TRADES VERIFIED IN 6 MONTHS"
				UR12 	= "NUMBER OF UPSC RETAIL TRADES VERIFIED IN 12 MONTHS"
				UR13 	= "NUMBER OF UPSC RETAIL TRADES VERIFIED IN 18 MONTHS"
				UR14 	= "NUMBER OF UPSC RETAIL TRADES VERIFIED IN 24 MONTHS"
				UR20 	= "MNTHS SINCE OLDST UPSC RET TRADE OPENED"
				UR21 	= "MONTHS SINCE RECENT UPSC RTL TRADE OPENED"
				UR28 	= "TOTAL  UPSCALE RETAIL HIGH CRED/CRED LIMIT"
				UR33 	= "TOTAL BALANCE OF ALL UPSCALE RETAIL TRADES"
				UR35 	= "AVERAGE BALNCE OF  UPSCALE RETAIL TRADES"
				DS02 	= "NUMBER OF CURRENTLY ACTIVE DEPARTME STORE TRADES"
				DS03 	= "NUMBER OF SATISFACTORY DEPARTMENT STORE TRADES"
				DS04 	= "NUMBER OF DEPARTMENT STORE TRADES TOO NEW TO RATE"
				DS05 	= "NUMBER OF DEPT STORE TRADES OPENED IN 3 MONTHS"
				DS06 	= "NUMBER OF DEPT STORE TRADES OPENED IN 6 MONTHS"
				DS07 	= "NUMBER OF DEPT STORE TRADES OPENED IN 12 MNTHS"
				DS08 	= "NUMBER OF DEPT STORE TRADES OPENED IN 18 MNTHS"
				DS09 	= "NUMBER OF DEPT STORE TRADES OPENED IN 24 MONTHS"
				DS10 	= "NUMBER OF DEPT STORE TRADES VERIFIED IN 3 MNTHS"
				DS11 	= "NUMBER OF DEPT STORE TRADES VERIFIED IN 6 MONTHS"
				DS12 	= "NUMBER OF DEPT STORE TRADES VERIFIED IN 12 MONTHS"
				DS13 	= "NUMBER OF DEPT STORE TRADES VERIFIED IN 18 MONTHS"
				DS14 	= "NUMBER OF DEPT STORE TRADES VERIF IN 24 MONTHS"
				DS21 	= "MNTHS SINCE MOST RECENT DEP ST TRD OPENED"
				DS33 	= "TOTAL BALANCE OF ALL DEP ST TRD	                      "
				DS35 	= "AVERAGE BALANCE OF ALL DEP ST TRADES"
				G001 	= "NUMBER OF 30 DAY RATINGS"
				G002 	= "NUMBER OF 60 DAY RATINGS"
				G003 	= "NUMBER OF 90 DAY RATINGS"
				G004 	= "NUMBER OF 120 DAY RATINGS"
				G005 	= "NUMBER OF 150 DAY RATINGS"
				G006   	= "NUMBER OF 30 DAY AND 60 DAY RATINGS"
				G007   	= "NUMBER OF 30 DAY OR WORSE RATINGS"
				G008   	= "NUMBER OF 60 DAY OR WORSE RATINGS"
				G009   	= "NUMBER OF 90 DAY OR WORSE RATINGS"
				G016   	= "NUMBER OF TRADES WITH MXD 2 IN IN 3 MNTHS"
				G017   	= "NUMBER OF TRADES WITH MXD 2 IN IN 6 MNTHS"
				G018   	= "NUMBER OF TRADES WITH MXD 2 IN IN 12MNTHS"
				G019   	= "NUMBER OF TRADES WITH MXD 2 IN IN 18MNTHS"
				G020   	= "NUMBER OF TRADES WITH MXD 2 IN IN 24MNTHS"
				G021   	= "NUMBER OF TRADES WITH MXD 3 IN IN 3 MNTHS"
				G022   	= "NUMBER OF TRADES WITH MXD 3 IN IN 6 MNTHS"
				G023   	= "NUMBER OF TRADES WITH MXD 3 IN IN 12MNTHS"
				G024   	= "NUMBER OF TRADES WITH MXD 3 IN IN 18MNTHS"
				G025   	= "NUMBER OF TRADES WITH MXD 3 IN IN 24MNTHS"
				G026   	= "NUMBER OF TRADES WITH MXD 4 IN IN 3 MNTHS"
				G027   	= "NUMBER OF TRADES WITH MXD 4 IN IN 6 MNTHS"
				G028   	= "NUMBER OF TRADES WITH MXD 4 IN IN 12MNTHS"
				G029   	= "NUMBER OF TRADES WITH MXD 4 IN IN 18MNTHS"
				G030   	= "NUMBER OF TRADES WITH MXD 4 IN IN 24MNTHS"
				G041   	= "NUMBER OF TRADES EVER 30 OR MORE DAYS PAST DUE"
				G042   	= "NUMBER OF TRADES EVER 60 OR MORE DAYS PAST DUE"
				G043   	= "NUMBER OF TRADES EVER 90 OR MORE DAYS PAST DUE"
				G044   	= "NUMBER OF TRADES EVER 120 / MORE DAYS PAST DUE"
				G045   	= "NUMBER OF TRADES EVER 150 / MORE DAYS PAST DUE"
				G046   	= "NUMBER OF TRADES NEVER 30 OR MORE DAYS PAST DUE	      "
				G047   	= "NUMBER OF TRADES NEVER 60 OR MORE DAYS PAST DUE"
				G048   	= "NUMBER OF TRADES NEVER 90 OR MORE DAYS PAST DUE"
				G049   	= "NUMBER OF TRADES NEVER 120 OR MORE DAYS PAST DUE"
				G050   	= "NUMBER OF TRADES NEVER 150 OR MORE DAYS PAST DUE"
				G051   	= "PERCENT OF  TRADES NEVER DELINQUENT"
				G057   	= "NUMBER OF TRADES 30 OR MORE DAYS PAST DUE IN 3 MN"
				G058   	= "NUMBER OF TRADES 30 OR MORE DAYS PAST DUE IN 6 MN"
				G059   	= "NUMBER OF TRADES 30 OR MORE DAYS PAST DUE IN 12 MN"
				G060   	= "NUMBER OF TRADES 30 OR MORE DAYS PAST DUE IN 18 MN"
				G061   	= "NUMBER OF TRADES 30 OR MORE DAYS PAST DUE IN 24 MN"
				G062   	= "NUMBER OF TRADES 60 OR MORE DAYS PAST DUE IN 3 MN"
				G063   	= "NUMBER OF TRADES 60 OR MORE DAYS PAST DUE IN 6 MN"
				G064   	= "NUMBER OF TRADES 60 OR MORE DAYS PAST DUE IN 12 MN"
				G065   	= "NUMBER OF TRADES 60 OR MORE DAYS PAST DUE IN 18 MN"
				G066   	= "NUMBER OF TRADES 60 OR MORE DAYS PAST DUE IN 24 MN"
				G067   	= "NUMBER OF TRADES 90 OR MORE DAYS PAST DUE IN 3 MN"
				G068   	= "NUMBER OF TRADES 90 OR MORE DAYS PAST DUE IN 6 MN"
				G069   	= "NUMBER OF TRADES 90 OR MORE DAYS PAST DUE IN 12 MN"
				G070   	= "NUMBER OF TRADES 90 OR MORE DAYS PAST DUE IN 18 MN"
				G071   	= "NUMBER OF TRADES 90 OR MORE DAYS PAST DUE IN 24 MN"
				G082   	= "NUMBER OF CURRENTLY PAST DUE BALANCES"
				G083   	= "NUMBER OF TRADES CURRENTLY 30 DAYS PAST DUE"
				G084   	= "NUMBER OF TRADES CURRENTLY 60 DAYS PAST DUE"
				G085   	= "NUMBER OF TRADES CURRENTLY 90 DAYS PAST DUE"
				G086   	= "NUMBER OF TRADES CURRENTLY 120 DAYS PAST DUE"
				G087   	= "NUMBER OF TRADES CURRENTLY 150 DAYS PAST DUE"
				G088   	= "NUMBER OF TRADES CURRENTLY DELINQUENT < 120 DAYS"
				G089   	= "HIGHEST DELINQUENCY EVER ON TRADE"
				G091   	= "TOTAL NOW PAST DUE"
				G093   	= "NUMBER OF DEROG PUBLIC RECORDS"
				G094   	= "NUMBER OF PUBLIC RECORD BANKRUPTCIES"
				G095   	= "MONS SINCE MOST RECENT  DEROG PUB REC"
				G096   	= "NUMBER OF INQUIRIES"
				G098   	= "NUMBER OF INQUIRIES IN IN 6 MONTHS"
				G102   	= "MONTHS SINCE MOST RECENT INQUIRY"
				G103   	= "MONTHS SINCE IN ACTIVITY"
				G104    = "MONTHS ON FILE"
				S002 	= "BIRTHDATE (YYMM)"
				S004 	= "AVERAGE NUMBER OF MONTHS TRADES ON FILE"
				S008 	= "NUMBER OF FINANCE TRADES VERIFIED IN 12 MNTH"
				S009 	= "NUMBER OF BANK, FINANCE PERSONAL REVOLVING TRDS"
				S010 	= "NUMBER OF SATISFACORY BANK ,FINANCE TRDS"
				S011    = "NUMBER OF OPEN TRADES"
				S012 	= "NUMBER OF OPEN REVOLVING TRADES"
				S014 	= "NUMBER OF OPEN FINANCE CO INST TRADES"
				S015 	= "NUMBER OF OPEN REV BANK TRADES WITH HC/CL > 5000"
				S018 	= "NUMBER OF FINANCE TRADES OPENED IN 12 MNTHS"
				S019 	= "NUMBER OF INSTALLMENT PERSONAL FINANCE TRADS"
				S020 	= "NUMBER OF REVOLVING PERSONAL FINANCE TRADES"
				S027 	= "MNTHS SINCE MOST RECNT FINANCE TRADE OPENED"
				S040 	= "HIGHEST RETAIL CREDIT LIMIT"
				S043 	= "NUMBER OF NON-INST TRADES > 50 % OF LIMIT"
				S046 	= "PERCENT OF ACTIVE TRADES WITH BALANCE > 0"
				S054 	= "NUMBER OF DIFFERENT SUBSCRIBERS"
				S055 	= "NUMBER OF UNIQUE ACCOUNTS"
				S059 	= "NUMBER OF PUBLIC RECORD AND TRADE LINE DEROGS"
				S060 	= "NUMBER OF TRADES WITH HIGH MOP"
				S061 	= "MONTHS SINCE MOST RECENT 60+ DAY RATING"
				S062 	= "MONTHS SINCE MOST RECENT 90+ DAY RATING"
				S063 	= "TOTAL PUBLIC RECORD AMOUNTS"
				S064 	= "TOTAL COLLECTION AMOUNT EVER OWED"
				S065 	= "NUMBER OF TAX LIENS"
				S066 	= "NUMBER OF DISPUTED TRADES"
				S078 	= "RATIO BAL/HIGH CR FOR PERS FIN VERFD IN 12"
				S079 	= "RATIO BAL/HI CR FOR DEPT/CLOTH VERFD IN 12"
				S114 	= "NUMBER OF INQUIRIES IN 6 MOS-EXCLUDING KOB A AND R"
				S115 	= "NUMBER OF PERSONAL FINANCE INQUIRIES"
				S0Y2 	= "BIRTHDATE (CCYYMM)"
				CTAM201TOT	= "TU Account Management Model 2.0 Score"
				CTAM201AC 	= "Adverse Action Codes	"
				CTAM201REJ 	= "Reject Indicator"
				VTGX2TOT 	= "Vantage Score 1.0 w/o Autherized User"
				VTGX2CRD 	= "Vantage Score Score Card"
				VTGX2AAC 	= "Vantage Score Adverse Action Codes"
				PermIDMismatchFlag1 	= "  "
                          	PermIDMismatchFlag2 	= " " 
				CBSA97 			= " "
				StateFIPSCode97		= " "
				CountyFIPSCode97	= " "
				CensusTract97 		= " " 
				CensusSuffix97		= " "
				CensusBlockGroup97 	= " "
				Latitude97 		= " "
				Longitude97 		= " "
				CBSA99 			= "  "   
				StateFIPSCode99	 	= " " 
				CountyFIPSCode99 	= " "   
				CensusTract99 		= " "
				CensusSuffix99 		= " "   	
				CensusBlockGroup99 	= " "
				Latitude99 		= " " 
				Longitude99 		= " "
				CBSA01 			= " "
				StateFIPSCode01		= " "
				CountyFIPSCode01    	= " "
				CensusTract01 	    	= " " 
				CensusSuffix01		= " "   
				CensusBlockGroup01	= " "   
				Latitude01 		= " "  
				Longitude01 		= " "  
				CBSA07 			= " "   
				StateFIPSCode07		= " "  
				CountyFIPSCode07	= " "  
				CensusTract07		= " "
				CensusSuffix07		= " "  
				CensusBlockGroup07	= " " 
				Latitude07		= " "
				Longitude07		= " "   
				CBSA08 			= " "   	
				StateFIPSCode08		= " "
				CountyFIPSCode08	= " "
				CensusTract08		= " " 
				CensusSuffix08		= " "   
				CensusBlockGroup08	= " " 
				Latitude08		= " "
				Longitude08		= " " 
				teditseq    		= " "
				PermID2007              = " "
				PermID2008              = " "    
                         
                         ;

infile "/data/ACCEPTS_08.txt" lrecl=2000 missover;

input  
                                         
                                         
                                        ZIPCODE		$  1     - 5
                                        STATE   	$  138   - 139
                                        PERMID  	$  140   - 152
                                        TUEDT2003	$  153   - 166
                                        DOB	176   	-  	183
					AT01	185	-	187
					AT03	188	-	190
					AT05	191	-	193
					AT06	194	-	196
					AT07	197	-	199
					AT08	200	-	202
					AT09	203	-	205
					AT10	206	-	208
					AT11	209	-	211
					AT12	212	-	214
					AT13	215	-	217
					AT14	218	-	220
					AT20	221	-	223
					AT21	224	-	226
					AT23	227	-	229
					AT24	230	-	232
					AT25	233	-	235
					AT26	236	-	238
					AT27	239	-	241
					AT28	242	-	248
					AT29	249	-	251
					AT33	252	-	258
					AT34	259	-	263
					AT35	264	-	270
					AT36	271	-	273
					AT99	274	-	280
					BR03	281	-	283
					BR20	284	-	286
					BR28	287	-	293
					BR33	294	-	300
					FR03	301	-	303
					FR33	304	-	310
					FR35	311	-	317
					RE03	318	-	320
					RE10	321	-	323
					RE11	324	-	326
					RE12	327	-	329
					RE13	330	-	332
					RE14	333	-	335
					RE20	336	-	338
					RE28	339	-	345
					RE32	346	-	352
					RE33	353	-	359
					RE34	360	-	364
					RE35	365	-	371
					BI01	372	-	374
					BI03	375	-	377
					BI05	378	-	380
					BI06	381	-	383
					BI07	384	-	386
					BI08	387	-	389
					BI09	390	-	392
					BI20	393	-	395
					BI28	396	-	402
					FI01	403	-	405
					FI03    406	-       408
				        FI05	409	-	411
					FI06    412	-       414	
					FI07	415	-	417
					FI08	418	-	420
					FI09	421	-	423
					IN03	424	-	426
					IN05	427	-	429
					IN06	430	-	432
					IN07	433	-	435
					IN08	436	-	438
					IN09	439	-	441
					IN10	442	-	444
					IN11	445	-	447
					IN12	448	-	450
					IN13	451	-	453
					IN14	454	-	456
					IN21	457	-	459
					IN28	460	-	466
					IN33	467	-	473
					IN34	474	-	478
					MT01	479	-	481
					MT02	482	-	484
					MT03	485	-	487
					MT04	488	-	490
					MT20	491	-	493
					MT21	494	-	496
					MT22	497	-	499
					MT28	500	-	506
					MT29	507	-	509
					MT32	510	-	516
					MT33	517	-	523
					MT34	524	-	528
					MT35	529	-	535
					MT36	536	-	538
					MT41	539	-	541
					MT42	542	-	544
					MT43	545	-	547
					MT44	548	-	550
					MT45	551	-	553
					MT46	554	-	556
					MT47	557	-	559
					MT48	560	-	562
					MT49	563	-	563
					MT50	564	-	564
					MT51	565	-	565
					MT52	566	-	566
					MT53	567	-	567
					MT54	568	-	568
					MT55	569	-	571
					MT56	572	-	578
					MT57	579	-	585
					PF02	586	-	588
					PF03	589	-	591
					PF05	592	-	594
					PF06	595	-	597
					PF07	598	-	600
					PF08	601	-	603
					PF09	604	-	606
					PF33	607	-	613
					PF34	614	-	618
					OF01	619	-	621
					OF03	622	-	624
					OF20	625	-	627
					OF28	628	-	634
					OF29	635	-	637
					OF33	638	-	644
					OF36	645	-	647
					ON01	648	-	650
					ON03	651	-	653
					ON20	654	-	656
					ON33	657	-	663
					ON34	664	-	668
					BC01	669	-	671
					BC02	672	-	674
					BC03	675	-	677
					BC05	678	-	680
					BC06	681	-	683
					BC07	684	-	686
					BC08	687	-	689
					BC09	690	-	692
					BC10	693	-	695
					BC11	696	-	698
					BC12	699	-	701
					BC13	702	-	704
					BC14	705	-	707
					BC21	708	-	710
					BC29	711	-	713
					BC30	714	-	718
					BC31	719	-	723
					BC34	724	-	728
					BC35	729	-	735
					BC36	736	-	738
					BC98	739	-	745
					PB03	746	-	748
   				   	PB05    749	-       751
					PB06	752	-	754
 					PB07	755	-	757
					PB08	758	-	760
					PB09	761	-	763
					PB10	764	-	766
					PB11	767	-	769
					PB12	770	-	772
					PB13	773	-	775
					PB14	776	-	778
					PB20	779	-	781
					PB21	782	-	784
					PB33	785	-	791
					PB35	792	-	798
					RT01	799	-	801
					RT03	802	-	804
					RT05	805	-	807
					RT06	808	-	810
					RT07	811	-	813
					RT08	814	-	816
					RT09	817	-	819
					RT10	820	-	822
					RT11	823	-	825
					RT12	826	-	828
					RT13	829	-	831
					RT14	832	-	834
					RT20	835	-	837
					RT21	838	-	840
					RT28	841	-	847
					RT29	848	-	850
					RT33	851	-	857
					RT34	858	-	862
					RT35	863	-	869
					RT36	870	-	872
					UR03	873	-	875
					UR05	876	-	878
					UR06	879	-	881
					UR07	882	-	884
					UR08	885	-	887
					UR09	888	-	890
					UR10	891	-	893
					UR11	894	-	896
					UR12	897	-	899
					UR13	900	-	902
					UR14	903	-	905
					UR20	906	-	908
					UR21	909	-	911
					UR28	912	-	918
					UR33	919	-	925
					UR35	926	-	932
					DS02	933	-	935
					DS03	936	-	938
					DS04	939	-	941
					DS05	942	-	944
					DS06	945	-	947
					DS07	948	-	950
					DS08	951	-	953
					DS09	954	-	956
					DS10	957	-	959
					DS11	960	-	962
					DS12	963	-	965
					DS13	966	-	968
					DS14	969	-	971
					DS21	972	-	974
					DS33	975	-	981
					DS35	982	-	988
					G001	989	-	991
					G002	992	-	994
					G003	995	-	997
					G004	998	-	1000
					G005	1001	-	1003
					G006	1004	-	1006
					G007	1007	-	1009
					G008	1010	-	1012
					G009	1013	-	1015
					G016	1016	-	1018
					G017	1019	-	1021
					G018	1022	-	1024
					G019	1025	-	1027
					G020	1028	-	1030
					G021	1031	-	1033
					G022	1034	-	1036
					G023	1037	-	1039
					G024	1040	-	1042
					G025	1043	-	1045
					G026	1046	-	1048
					G027	1049	-	1051
					G028	1052	-	1054
					G029	1055	-	1057
					G030	1058	-	1060
					G041	1061	-	1063
					G042	1064	-	1066
					G043	1067	-	1069
					G044	1070	-	1072
					G045	1073	-	1075
					G046	1076	-	1078
					G047	1079	-	1081
					G048	1082	-	1084
					G049	1085	-	1087
					G050	1088	-	1090
					G051	1091	-	1095
					G057	1096	-	1098
					G058	1099	-	1101
					G059	1102	-	1104
					G060	1105	-	1107
					G061	1108	-	1110
					G062	1111	-	1113
					G063	1114	-	1116
					G064	1117	-	1119
					G065	1120	-	1122
					G066	1123	-	1125
					G067	1126	-	1128
					G068	1129	-	1131
					G069	1132	-	1134
					G070	1135	-	1137
					G071	1138	-	1140
					G082	1141	-	1143
					G083	1144	-	1146
					G084	1147	-	1149
					G085	1150	-	1152
					G086	1153	-	1155
					G087	1156	-	1158
					G088	1159	-	1161
					G089	1162	-	1164
					G091	1165	-	1171
					G093	1172	-	1174
					G094	1175	-	1177
					G095	1178	-	1180
					G096	1181	-	1183
					G098	1184	-	1186
					G102	1187	-	1189
					G103	1190	-	1192
					G104	1193	-	1196
					S002	1197	-	1200
					S004	1201	-	1203
					S008	1204	-	1206
					S009	1207	-	1209
					S010	1210	-	1212
					S011	1213	-	1215
					S012	1216	-	1218
					S014	1219	-	1221
					S015	1222	-	1224
					S018	1225	-	1227
					S019	1228	-	1230
					S020	1231	-	1233
					S027	1234	-	1236
					S040	1237	-	1243
					S043	1244	-	1246
					S046	1247	-	1251
					S054	1252	-	1254
					S055	1255	-	1257
					S059	1258	-	1260
					S060	1261	-	1263
					S061	1264	-	1266
					S062	1267	-	1269
					S063	1270	-	1276
					S064	1277	-	1283
					S065	1284	-	1286
					S066	1287	-	1289
					S078	1290	-	1294
					S079	1295	-	1299
					S114	1300	-	1302
					S115	1303	-	1305
					S0Y2	1306	-	1311
					CTAM201TOT	1312	-	1314
					CTAM201AC	1315	-	1322
					CTAM201REJ $	1323	-	1323
					VTGX2TOT	1324	-	1326
					VTGX2CRD	1327	-	1328
					VTGX2AAC$	1329	-	1336
					PermIDMismatchFlag1	$ 1337	-	1337
					PermIDMismatchFlag2	$ 1338	-	1338
					CBSA97 			1339	-	1343
					StateFIPSCode97		1344	-	1345
					CountyFIPSCode97	1346	-	1348
					CensusTract97		1349	-	1352
					CensusSuffix97		1353	-	1354
					CensusBlockGroup97 	1355	-	1355
					Latitude97		1356	-	1363
					Longitude97		1364	-	1372
					CBSA99			1373	-	1377
					StateFIPSCode99	    	1378    -       1379
					CountyFIPSCode99	1380	-	1382	
					CensusTract99	    	1383    -	1386
					CensusSuffix99	    	1387    -	1388
					CensusBlockGroup99	1389	-	1389
					Latitude99		1390	-	1397
					Longitude99		1398	-	1406
					CBSA01 			1407	-	1411
					StateFIPSCode01		1412	-	1413
					CountyFIPSCode01	1414	-	1416
					CensusTract01		1417	-	1420
					CensusSuffix01		1421	-	1422
					CensusBlockGroup01	1423	-	1423
					Latitude01		1424	-	1431		
					Longitude01		1432	-	1440
                                       	CBSA07 			1441	-	1445					
					StateFIPSCode07		1446	-	1447	
					CountyFIPSCode07	1448	-	1450
					CensusTract07		1451	-	1454
					CensusSuffix07		1455	-	1456
					CensusBlockGroup07	1457	-	1457
					Latitude07		1458	-	1465
					Longitude07		1466	-	1474
                                       	CBSA08			1475	-	1479	
					StateFIPSCode08		1480	-	1481	
					CountyFIPSCode08	1482	-	1484	
					CensusTract08		1485	-	1488	
					CensusSuffix08		1489	-	1490	
					CensusBlockGroup08	1491	-	1491	
					Latitude08		1492	-	1499	
					Longitude08		1500	-	1508	
					teditseq		$ 1509 	- 	1522
                                       	PermID2007      	$ 1523 	- 	1535        
                                        PermID2008		$ 1536 	-	1548
					; 
                                                                                                                            
proc contents;
proc print data=acc&num (obs=3) label;  ** label here ; 
run;

proc print data = acc&num (obs=3) ;  ** no label here ; 
run; 


%mend  tu1;

%let num = 2008; 

%tu1;
 
run;

libname save "/data" ; 

data save.tu2008_dec; 
  set acc&num; 
run; 

endsas ; 

